#include "device_type.h"
#ifdef SM_KF
#include "app_api.h"
#include "app_log.h"
#include "app_cli_cmd.h"
#include "bsp_gpio.h"
#include "app_button.h"
#include "app_led.h"
#include "bsp_iadc.h"
#include "em_emu.h"
#include "softwareMultiTimer.h"
#include "device.h"
#include "bsp_system.h"
#include "net_protocol.h"
#include "app_key_value.h"
#include "bsp_rmu.h"
#include "bsp_wdog.h"
#include "RBFVersion.h"
#include "git_version.h"
#include "net_aseq.h"

#define DEVICE_TX_POWER_DEFAULT  (100)
#define DEVICE_CTUNE_DEFAULT     (170)
#define DEVICE_LFXO_CTUNE_DEFAULT (40)
#define IADC_TIMER_INTERVAL      (60*60)  //s
#define APP_MAJOR_VERSION        (1)
#define APP_MINOR_VERSION        (1)
#define APP_STAGE_VERSION        (2) //max 255
#define SENSOR_VERSION           ((APP_MAJOR_VERSION << 16)|(APP_MINOR_VERSION<<8)|(APP_STAGE_VERSION))

static void setTxpowerDefaule(void);
static void setCtuneDefaule(void);
static void setLfxoCtuneDefaule(void);
static void gpio_state_change_handler(void);
static void SM_button_init(void);
static void SM_iadc_init(void);
static void printSoftWareInformation(void);
/**
 * @brief: 遥控器项目相关外设初始化
 * */
void SM_main(void)
{
  setTxpowerDefaule();
  setCtuneDefaule();
  setLfxoCtuneDefaule();
  SM_button_init();
  SM_iadc_init();
  startWatchDogTimer();
  printSoftWareInformation();
}

/**
 * @brief: 遥控器项目while函数相关处理
 * */
void SM_process(void)
{
  feedWatchDogHandler();
  SM_key_value_handler();
  gpio_state_change_handler();
}

/******************get device sleep state***************************/

bool device_sleep_state_get(void)
{
  return true;
}

/**************** set tx power/ctune defaule***********************/
static void setTxpowerDefaule(void)
{
  int16_t txPowerDeciDbm = 0;
  int ret = getThisParam(RfTxPower, &txPowerDeciDbm);
  if(ret != 0) {
      txPowerDeciDbm = DEVICE_TX_POWER_DEFAULT;
      setThisParam(RfTxPower, &txPowerDeciDbm);
  }
  RAIL_Status_t status = bsp_rf_set_tx_power_bdm(txPowerDeciDbm);
  if (status != RAIL_STATUS_NO_ERROR) {
      DS_app_log_error("set tx power error, status = 0x%x\r\n", status);
  }
}

static void setCtuneDefaule(void)
{
  uint32_t ctune = 0;
  int ret = getThisParam(RfCtune, &ctune);
  if(ret != 0) {
      ctune = DEVICE_CTUNE_DEFAULT;
      setThisParam(RfCtune, &ctune);
  }
  RAIL_Status_t status = bsp_rf_set_ctune(ctune);
  if (status != RAIL_STATUS_NO_ERROR) {
      DS_app_log_error("set ctune error, status = 0x%x\r\n", status);
  }
}

static void setLfxoCtuneDefaule(void)
{
  uint8_t ctune = 0;
  int ret = getThisParam(lfxoCtune, &ctune);
  if(ret != 0) {
      ctune = DEVICE_LFXO_CTUNE_DEFAULT;
      setThisParam(lfxoCtune, &ctune);
  }
  CMU_OscillatorTuningSet(cmuOsc_LFXO,ctune);
}

/************************button handler****************************/

static struct Button btn[4] = {0};
static MultiTimer buttonTimer[4] = {
    {.Handle = 0},
    {.Handle = 1},
    {.Handle = 2},
    {.Handle = 3},
};

static void ds_btn_state_change_callback(uint8_t intNo, void *ctx);
/**
 * @brief: button timer callback,每10ms轮询一次button状态
 * */
static void buttonTimerCallback(MultiTimer* timer, void *userData)
{
  (void)userData;
  if(timer->Handle == 0) {
      button_handler(&btn[0]);
  } else if (timer->Handle == 1) {
      button_handler(&btn[1]);
  } else if (timer->Handle == 2) {
      button_handler(&btn[2]);
  } else if (timer->Handle == 3) {
      button_handler(&btn[3]);
  }
}

static ds_button_t button[4] = {
  {
      .port = gpioPortA,
      .pin = 7,
      .mode = gpioModeInputPull,
      .initial = 1,
      .valid = 0,
      .ds_button_state_change = ds_btn_state_change_callback,
  },
  {
      .port = gpioPortB,
      .pin = 1,
      .mode = gpioModeInputPull,
      .initial = 1,
      .valid = 0,
      .ds_button_state_change = ds_btn_state_change_callback,
  },
  {
      .port = gpioPortA,
      .pin = 8,
      .mode = gpioModeInputPull,
      .initial = 1,
      .valid = 0,
      .ds_button_state_change = ds_btn_state_change_callback,
  },
  {
      .port = gpioPortA,
      .pin = 5,
      .mode = gpioModeInputPull,
      .initial = 1,
      .valid = 0,
      .ds_button_state_change = ds_btn_state_change_callback,
  },
};

/**
 * @brief:button 1 引脚状态改变时启动button timer
 * */
static void ds_btn_state_change_callback(uint8_t intNo, void *ctx)
{
  (void)intNo;
  ds_button_t *btnDrive = (ds_button_t *)ctx;

  if(btnDrive->port == button[0].port && btnDrive->pin == button[0].pin && buttonTimer[0].status == EN_MULTITIMER_STATUS_IDLE) {
      button_handler(&btn[0]);
  }
  else if(btnDrive->port == button[1].port && btnDrive->pin == button[1].pin && buttonTimer[1].status == EN_MULTITIMER_STATUS_IDLE) {
      button_handler(&btn[1]);
  }
  else if(btnDrive->port == button[2].port && btnDrive->pin == button[2].pin && buttonTimer[2].status == EN_MULTITIMER_STATUS_IDLE) {
      button_handler(&btn[2]);
  }
  else if(btnDrive->port == button[3].port && btnDrive->pin == button[3].pin && buttonTimer[3].status == EN_MULTITIMER_STATUS_IDLE) {
      button_handler(&btn[3]);
  }
}

/**
 * @brief: 读取button引脚状态
 * @param： button id
 * @return： gpio 状态
 * */
static uint8_t read_button_GPIO(uint8_t button_id)
{
  // you can share the GPIO read function with multiple Buttons
  switch(button_id)
  {
    case 0:
      return read_button_level(&button[0]);
      break;
    case 1:
      return read_button_level(&button[1]);
      break;
    case 2:
      return read_button_level(&button[2]);
      break;
    case 3:
      return read_button_level(&button[3]);
      break;
    default:
      return 0;
      break;
  }
}

bool isBattVoltageHigh(void)
{
  return true;
}

/**
 * @brief: button 1 按键按下时回调函数
 * @param：btn结构体指针
 * */
static void btn_press_handler(void* butt)
{
  Button* btnHanlde = (Button*)butt;
  keyValue_t outputKeyValue ={0x00};
  uint8_t data[5] = {0,0,15,0,1};

  outputKeyValue.id = 0x30;
  outputKeyValue.valueSize = 1;
  if(btnHanlde->button_id == 0) {
      if(btnHanlde->event == SINGLE_CLICK) {
          outputKeyValue.value[0] = 2;
          SM_led_start(data, ALARM_BLINK);
          if(false == device_test_sleep_state_get()) {
              DS_app_log_error("btn 2 test \r\n");
          }
      }
  }
  else if(btnHanlde->button_id == 1) {
      if(btnHanlde->event == SINGLE_CLICK) {
          outputKeyValue.value[0] = 3;
          SM_led_start(data, ALARM_BLINK);
          if(false == device_test_sleep_state_get()) {
              DS_app_log_error("btn 3 test \r\n");
          }
      }
  }
  else if(btnHanlde->button_id == 2) {
      if(btnHanlde->event == SINGLE_CLICK) {
          outputKeyValue.value[0] = 4;
          SM_led_start(data, ALARM_BLINK);
          if(false == device_test_sleep_state_get()) {
              DS_app_log_error("btn 4 test \r\n");
          }
      }
      else if(btnHanlde->event == LONG_PRESS_START) {
          if(btn[3].event == LONG_PRESS_START) {
              startCommissiongJoin(buttonTrigger, keyFob_device);
          }
      }
  }
  else if(btnHanlde->button_id == 3) {
      if(btnHanlde->event == SINGLE_CLICK){
          outputKeyValue.value[0] = 1;
          SM_led_start(data, ALARM_BLINK);
          if(false == device_test_sleep_state_get()) {
              DS_app_log_error("btn 1 test \r\n");
          }
      }
      else if(btnHanlde->event == LONG_PRESS_START) {
          if(btn[2].event == LONG_PRESS_START) {
              startCommissiongJoin(buttonTrigger, keyFob_device);
          }
      }
  }
  if(btnHanlde->event == SINGLE_CLICK)
    set_key_value(&outputKeyValue);
}

static void gpio_state_change_handler(void)
{
  if(read_button_level(&button[0]) == button[0].valid) {
      if(buttonTimer[0].status == EN_MULTITIMER_STATUS_IDLE) {
          button_handler(&btn[0]);
      }
  }
  if(read_button_level(&button[1]) == button[1].valid) {
      if(buttonTimer[1].status == EN_MULTITIMER_STATUS_IDLE) {
          button_handler(&btn[1]);
      }
  }
  if(read_button_level(&button[2]) == button[2].valid) {
      if(buttonTimer[2].status == EN_MULTITIMER_STATUS_IDLE) {
          button_handler(&btn[2]);
      }
  }
  if(read_button_level(&button[3]) == button[3].valid) {
      if(buttonTimer[3].status == EN_MULTITIMER_STATUS_IDLE) {
          button_handler(&btn[3]);
      }
  }
}

/**
 * @brief: button reed初始化；注册不同状态相关回调函数
 * */
static void SM_button_init(void)
{
  ds_button_init(&button[0]);
  ds_button_init(&button[1]);
  ds_button_init(&button[2]);
  ds_button_init(&button[3]);

  uint8_t data[5] = {0, 3, 0, 0, 1};
  SM_led_start(data, POWER_ON_BLINK);

  button_init(&btn[0], &buttonTimer[0], buttonTimerCallback, read_button_GPIO, button[0].valid, 0);
  button_attach(&btn[0], SINGLE_CLICK, btn_press_handler);

  button_init(&btn[1], &buttonTimer[1], buttonTimerCallback, read_button_GPIO, button[1].valid, 1);
  button_attach(&btn[1], SINGLE_CLICK, btn_press_handler);

  button_init(&btn[2], &buttonTimer[2], buttonTimerCallback, read_button_GPIO, button[2].valid, 2);
  button_attach(&btn[2], SINGLE_CLICK, btn_press_handler);
  button_attach(&btn[2], LONG_PRESS_START, btn_press_handler);

  button_init(&btn[3], &buttonTimer[3], buttonTimerCallback, read_button_GPIO, button[3].valid, 3);
  button_attach(&btn[3], SINGLE_CLICK,       btn_press_handler);
  button_attach(&btn[3], LONG_PRESS_START,       btn_press_handler);
}

/************************led init***************************************/

static MultiTimer ledTimer;
static led_ins_t ledDriver = {0x00};

static ds_gpio_t led[3] = {
  {
      .port = gpioPortC,
      .pin = 2,
      .mode = gpioModePushPull,
      .initial = 1,
      .valid = 0,
  },
  {
      .port = gpioPortC,
      .pin = 1,
      .mode = gpioModePushPull,
      .initial = 1,
      .valid = 0,
  },
  {
      .port = gpioPortC,
      .pin = 3,
      .mode = gpioModePushPull,
      .initial = 1,
      .valid = 0,
  },
};

/**
 * @brief: led闪烁开始
 * @param： led物模型指针；5Bytes：R G Bbitmask bitTime cycleTimes
 * */
void SM_led_start(uint8_t *data, blinkType_t type)
{
  led_driver_init(&ledDriver, &ledTimer, led[0], led[1], led[2], data, type);
}

/*******************battery detect***************************/
static MultiTimer iadcTimer;
static uint8_t adcState = 0x00;

static void iadcTimerCallback(MultiTimer* timer, void *userData)
{
  (void)timer;
  (void)userData;

  if(adcState == 0) {
      battery_detect_start(iadcPosInputAvdd);
      adcState = 0x01;
      softwareMultiTimerStart(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &iadcTimer, 32768*IADC_TIMER_INTERVAL, iadcTimerCallback,NULL,0);
  }
  else if(adcState == 0x01) {
      adcState = 0x00;
      SM_iadc_init();
  }
}

/**
 * @brief: adc init
 * */
static void SM_iadc_init(void)
{
  softwareMultiTimerStart(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &iadcTimer, 3277, iadcTimerCallback,NULL,0);
}

/**
 * @brief: 获取电压值
 * @return: battery unit:mV
 * */
uint8_t SM_battery_get(void)
{
  uint16_t battery = get_battery_monitor_voltage();
  if(false == device_test_sleep_state_get()) {
      DS_app_log_error("battery = %d \r\n", battery);
  }
  return battery>1800?(battery/10 - 180):0;
}
/************************temperature get*************************************/

/**
 * @brief: Get the internal temperature of the chip
 * @return: temperature
 * */
int8_t SM_tempDrv_get(void)
{
  float tempCelsius;
  int8_t result;

  tempCelsius = EMU_TemperatureGet();

  if (tempCelsius < INT8_MIN) {
    tempCelsius = INT8_MIN;
  } else if (tempCelsius > INT8_MAX) {
    tempCelsius = INT8_MAX;
  }

  // adding extra 0.5 before truncating to simulate rounding behavior
  result = (((int8_t) (tempCelsius + 0.5 - INT8_MIN)) + INT8_MIN);

  return result;
}

/**********************get hard information***************************/

/**
 * @brief: get hard information
 * @param: point
 * @return: value length
 * */
uint8_t get_hard_information(uint8_t *data)
{
  hardinfo_t hardInfo = {0x00};
  char psn[16] = "DH0180N00001";
  int ret = 0;

  ret = getThisParam(ENpbyKeyM, hardInfo.psn);
  if(ret != 0) {
      memcpy(hardInfo.psn, psn, sizeof(psn));
      setThisParam(ENpbyKeyM, hardInfo.psn);
  }

  ret = getThisParam(ENbyDeviceType, &hardInfo.deviceType);
  if(ret != 0) {
      hardInfo.deviceType = EN_DEVICE_TYPE_FOB_FIRST;
      setThisParam(ENbyDeviceType, &hardInfo.deviceType);
  }

  ret = getThisParam(ENbyModelType, &hardInfo.modelType);
  if(ret != 0) {
      hardInfo.modelType = 0x01;
      setThisParam(ENbyModelType, &hardInfo.modelType);
  }

  ret = getThisParam(ENbyHardType, &hardInfo.hardType);
  if(ret != 0) {
      hardInfo.hardType = 0x01;
      setThisParam(ENbyHardType, &hardInfo.hardType);
  }

  ret = getThisParam(ENpbyMacID, hardInfo.pmacID);
  if(ret != 0) {
      getMacAddr(hardInfo.pmacID);
      setThisParam(ENpbyMacID, hardInfo.pmacID);
  }

  ret = getThisParam(ENpbyRfVer, hardInfo.pRfVer);
  if(ret != 0
      || hardInfo.pRfVer[0] != MAJOR_VERSION
      || hardInfo.pRfVer[1] != MINOR_VERSION
      || hardInfo.pRfVer[2] != STAGE_VERSION) {
      hardInfo.pRfVer[0] = MAJOR_VERSION;
      hardInfo.pRfVer[1] = MINOR_VERSION;
      hardInfo.pRfVer[2] = STAGE_VERSION;
      setThisParam(ENpbyRfVer, hardInfo.pRfVer);
  }

  ret = getThisParam(ENpbySensorVer, &hardInfo.sensorVer);
  if(ret != 0
      || hardInfo.sensorVer[0] != APP_MAJOR_VERSION
      || hardInfo.sensorVer[1] != APP_MINOR_VERSION
      || hardInfo.sensorVer[2] != APP_STAGE_VERSION) {
      hardInfo.sensorVer[0] = APP_MAJOR_VERSION;
      hardInfo.sensorVer[1] = APP_MINOR_VERSION;
      hardInfo.sensorVer[2] = APP_STAGE_VERSION;
      setThisParam(ENpbySensorVer, &hardInfo.sensorVer);
  }

  memcpy(data, &hardInfo, sizeof(hardInfo));

  return sizeof(hardInfo);
}

/**********************print informatio**************************/
static void printSoftWareInformation(void)
{
  uint8_t macAddr[8] = {0x00};
  getMacAddr(macAddr);
  int16_t txPowerDeciDbm = 0;
  uint32_t ctune = 0;
  char reason[12] = {0};
  uint8_t lfxoTune= 0;
  uint8_t SNNumber[16] = {0x00};

  APP_PRINTF("\r\n*************information***************\r\n");
  uint32_t rst_cause = ds_rmu_init();
  resetToString(rst_cause, reason);
  APP_PRINTF("reset reason   : %s\r\n",reason);
  APP_PRINTF("device mac     : ");
  for(uint8_t i=0;i<7;i++){
      APP_PRINTF("%02x:", macAddr[i]);
  }
  APP_PRINTF("%02x \r\n", macAddr[7]);
  APP_PRINTF("stack version  : v%d.%d.%d \r\n", (STACK_VERSION>>16&0xFF), (STACK_VERSION>>8&0xFF),STACK_VERSION&0xFF);
  APP_PRINTF("app  version   : v%d.%d.%d \r\n", (SENSOR_VERSION>>16&0xFF), (SENSOR_VERSION>>8&0xFF),SENSOR_VERSION&0xFF);
  getThisParam(ENpbyKeyM, SNNumber);
  APP_PRINTF("SN number      : %s\r\n", SNNumber);
  APP_PRINTF("device type    : 0x%02X\r\n", EN_DEVICE_TYPE_FOB_FIRST);
  printfDeviceRfFreqInfo();
  getThisParam(RfTxPower, &txPowerDeciDbm);
  APP_PRINTF("device power   : %d \r\n", txPowerDeciDbm);
  getThisParam(RfCtune, &ctune);
  APP_PRINTF("device ctune   : %ld \r\n", ctune);
  getThisParam(lfxoCtune, &lfxoTune);
  APP_PRINTF("device lfxoTune: %d \r\n", lfxoTune);
  APP_PRINTF("build app time : %s %s \r\n", __DATE__, __TIME__);
#ifdef  CONFIG_JENKINS_BUILD_NUMBER
  APP_PRINTF("jenkins build number : %d\r\n", CONFIG_JENKINS_BUILD_NUMBER);
#else
  APP_PRINTF("jenkins build number : 0\r\n");//没定义默认0
#endif
  APP_PRINTF("***************************************\r\n\r\n");
}

/***********************get model api******************************/

static uint8_t device_input_output_state_get(uint8_t *buffer)
{
  buffer[0] = 0x00;
  buffer[1] = 0x00;
  return 2;
}

uint8_t get_device_state(uint8_t *buffer)
{
  uint8_t data[8] = {0x00};
  uint8_t data_size = 0x00;
  uint8_t index = 0;

  buffer[index] = 0x10;
  index += 1;
  data_size = device_input_output_state_get(data);
  memcpy(&buffer[index], data, data_size);
  memset(data, 0, data_size);
  index += data_size;

  return index;
}

static MultiTimer findMeTimer;

static void findMeTimerCallback(MultiTimer* timer, void *userData)
{
  (void)timer;
  (void)userData;
  uint8_t data[5] = {0};
  SM_led_start(data, NONE_BLINK);
}

void SM_device_QRF_state_Handle(QRFH1_t qrfH1, QRFH2_t qrfH2)
{
  (void)qrfH1;
  uint8_t data[5] = {0};
  if(qrfH2.isFM == 1) {
      data[1] = 15;
      data[3] = 1;
      data[4] = 15;
      SM_led_start(data, FIND_ME_BLINK);
      softwareMultiTimerStop(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &findMeTimer,0);
      softwareMultiTimerStart(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &findMeTimer, 32768*30, findMeTimerCallback,NULL,0);
  }
  else {
      if(findMeTimer.status != EN_MULTITIMER_STATUS_IDLE) {
          softwareMultiTimerStop(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &findMeTimer,0);
          SM_led_start(data, NONE_BLINK);
      }
  }
}


/**********************set gpio mode default*************************/

void staticPowerGpioInit(void)
{
#if 1
  CMU_ClockEnable(cmuClock_GPIO, true);
  GPIO_PinModeSet(gpioPortA, 3,gpioModePushPull,1);
  GPIO_PinModeSet(gpioPortA, 4,gpioModeInputPull,0);
  GPIO_PinModeSet(gpioPortB, 0,gpioModeInputPull,1);
  GPIO_PinModeSet(gpioPortC, 0,gpioModeInput,0);
  GPIO_PinModeSet(gpioPortD, 2,gpioModePushPull,1);
#else
  CMU_ClockEnable(cmuClock_GPIO, true);
  GPIO_PinModeSet(gpioPortA, 0,gpioModeDisabled,0);
  GPIO_PinModeSet(gpioPortA, 3,gpioModePushPull,0);
  GPIO_PinModeSet(gpioPortA, 4,gpioModeInput,0);
  GPIO_PinModeSet(gpioPortA, 5,gpioModeInputPull,1);
  GPIO_PinModeSet(gpioPortA, 6,gpioModePushPull,1);
  GPIO_PinModeSet(gpioPortA, 7,gpioModeInput,0);
  GPIO_PinModeSet(gpioPortA, 8,gpioModeDisabled,0);
  GPIO_PinModeSet(gpioPortB, 0,gpioModeInputPull,1);
  GPIO_PinModeSet(gpioPortB, 1,gpioModeDisabled,0);
  GPIO_PinModeSet(gpioPortC, 0,gpioModeInputPull,1);
  GPIO_PinModeSet(gpioPortC, 1,gpioModePushPull,1);
  GPIO_PinModeSet(gpioPortC, 2,gpioModePushPull,1);
  GPIO_PinModeSet(gpioPortC, 3,gpioModePushPull,1);
  GPIO_PinModeSet(gpioPortC, 4,gpioModeDisabled,0);
  GPIO_PinModeSet(gpioPortC, 5,gpioModeInputPull,1);
  GPIO_PinModeSet(gpioPortC, 6,gpioModeDisabled,0);
  GPIO_PinModeSet(gpioPortC, 7,gpioModeDisabled,0);
  GPIO_PinModeSet(gpioPortD, 2,gpioModeInputPull,1);
  GPIO_PinModeSet(gpioPortD, 3,gpioModeDisabled,0);
#endif
}

#endif


